package com.smdp.service.impl;

import cn.hutool.core.bean.BeanUtil;
import cn.hutool.core.bean.copier.CopyOptions;
import cn.hutool.core.util.RandomUtil;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.smdp.dto.ChangePasswordFormDTO;
import com.smdp.dto.LoginFormDTO;
import com.smdp.dto.Result;
import com.smdp.dto.UserDTO;
import com.smdp.entity.User;
import com.smdp.mapper.UserMapper;
import com.smdp.service.IUserService;
import com.smdp.utils.JwtHelper;
import com.smdp.utils.PasswordEncoder;
import com.smdp.utils.RegexUtils;
import com.smdp.utils.UserHolder;
import org.springframework.data.redis.connection.BitFieldSubCommands;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.stereotype.Service;

import javax.annotation.Resource;
import javax.servlet.http.HttpServletRequest;

import java.time.LocalDateTime;
import java.time.format.DateTimeFormatter;
import java.util.*;
import java.util.concurrent.TimeUnit;

import static com.smdp.utils.RedisConstants.*;
import static com.smdp.utils.SystemConstants.USER_NICK_NAME_PREFIX;

/**
 * 用户功能服务类。
 * 包含发送（登录和修改密码的）验证码、登录（使用验证码或密码）、修改密码（使用验证码或密码）、查询“我的信息”、登出、根据用户id查询用户、签到
 * 以及查询连续签到天数。其中，发送验证码通过阿里云短信服务实现，验证码保存在Redis中；数据库只储存加盐加密的密码，防止用户密码泄露；
 * 根据id查询用户信息仅返回不敏感的信息，防止用户敏感信息泄露。
 *
 * @author 蔡方珩
 */
@Service
public class UserServiceImpl extends ServiceImpl<UserMapper, User> implements IUserService {

    @Resource
    private StringRedisTemplate stringRedisTemplate;

    @Resource
    private AliyunSendSmsServiceImpl aliyunSendSmsService;

    /**
     * 发送登录的手机验证码。
     * 通过阿里云服务实现短信发送，并将验证码保存在Redis中等待比对。
     * @param phone 电话号码
     * @return 成功：ok / 失败：失败原因
     */
    @Override
    public Result sendCodeForLogin(String phone) {
        // 校验手机号
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 发送验证码，发送成功则保存到Redis等待校验
        String msg = aliyunSendSmsService.sendCodeToUser(phone, LOGIN_CODE_KEY);
        log.trace(msg);
        // 返回ok
        return Result.ok();
    }

    /**
     * 使用验证码用户登录。
     * 将用户提供的验证码与Redis中的验证码比对。
     * @param loginForm 登录表单，包含用户手机和验证码
     * @return 登录成功：token / 登录失败：失败原因
     */
    @Override
    public Result loginByCode(LoginFormDTO loginForm) {
        // 1.校验手机号
        String phone = loginForm.getPhone();
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 2.校验验证码
        String cacheCode = stringRedisTemplate.opsForValue().get(LOGIN_CODE_KEY + phone);
        String code = loginForm.getCode();
        if (cacheCode == null || RegexUtils.isCodeInvalid(code) || !cacheCode.equals(code)) {
            // 3.不一致，报错
            return Result.fail("验证码错误");
        }
        // 4.一致，根据手机号查询用户
        User user = query().eq("phone", phone).one();
        // 5.判断用户是否存在
        if (user == null) {
            // 6.不存在，创建新用户并保存
            user = createUserWithPhone(phone);
        }
        UserDTO userDTO = BeanUtil.copyProperties(user, UserDTO.class);
        // 7.保存用户信息到 redis 中
        // 7.1.使用JWT生成token，作为登录令牌
        String token = JwtHelper.createToken(userDTO.getId(), userDTO.getNickName());
        // 7.2.User对象转为Hash存储
        Map<String, Object> userMap = BeanUtil.beanToMap(userDTO, new HashMap<>(),
                CopyOptions.create().
                        setIgnoreNullValue(true).
                        setFieldValueEditor((fieldName, fieldValue) -> fieldValue.toString()));
        // 7.3.存储
        String tokenKey = LOGIN_USER_KEY + token;
        stringRedisTemplate.opsForHash().putAll(tokenKey, userMap);
        // 7.4.设置token有效期
        stringRedisTemplate.expire(tokenKey, LOGIN_USER_TTL, TimeUnit.SECONDS);
        // 8.返回token
        return Result.ok(token);
    }

    /**
     * 使用密码登录。
     * 将用户提供的密码加盐加密，并与数据库中的密码进行比对。
     * @param loginForm 登录表单，包含用户手机和密码
     * @return 登录成功：token / 登录失败：失败原因
     */
    @Override
    public Result loginByPassword(LoginFormDTO loginForm) {
        // 1.校验手机号
        String phone = loginForm.getPhone();
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 2.校验密码
        String password = loginForm.getPassword();
        if (RegexUtils.isPasswordInvalid(password)) {
            // 如果不符合，返回错误信息
            return Result.fail("密码格式错误！");
        }
        String encodedPassword = PasswordEncoder.encode(password);
        User user = query()
                .eq("phone", phone)
                .eq("password", encodedPassword)
                .one();
        if (user == null) {
            // 3.不一致，报错
            return Result.fail("密码错误");
        }
        UserDTO userDTO = BeanUtil.copyProperties(user, UserDTO.class);
        // 4.保存用户信息到 redis 中
        // 4.1.使用JWT生成token，作为登录令牌
        String token = JwtHelper.createToken(userDTO.getId(), userDTO.getNickName());
        // 4.2.User对象转为Hash存储
        Map<String, Object> userMap = BeanUtil.beanToMap(userDTO, new HashMap<>(),
                CopyOptions.create().
                        setIgnoreNullValue(true).
                        setFieldValueEditor((fieldName, fieldValue) -> fieldValue.toString()));
        // 4.3.存储
        String tokenKey = LOGIN_USER_KEY + token;
        stringRedisTemplate.opsForHash().putAll(tokenKey, userMap);
        // 4.4.设置token有效期
        stringRedisTemplate.expire(tokenKey, LOGIN_USER_TTL, TimeUnit.SECONDS);
        // 5.返回token
        return Result.ok(token);
    }

    /**
     * 通过旧密码修改密码。
     * 通过验证后将加盐加密的密码加入数据库。修改成功后登出。
     * @param changePasswordForm 修改密码表单
     * @param request http请求
     * @return 登录成功：ok / 登录失败：失败原因
     */
    @Override
    public Result changePasswordByOldPassword(ChangePasswordFormDTO changePasswordForm, HttpServletRequest request) {
        // 1.校验手机号
        String phone = changePasswordForm.getPhone();
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 2.校验密码
        String oldPassword = changePasswordForm.getOldPassword();
        String newPassword = changePasswordForm.getNewPassword();
        if (RegexUtils.isPasswordInvalid(oldPassword) || RegexUtils.isPasswordInvalid(newPassword)) {
            // 如果不符合，返回错误信息
            return Result.fail("密码格式错误！");
        }
        String encodedOldPassword = PasswordEncoder.encode(oldPassword);
        User user = query()
                .eq("phone", phone)
                .eq("password", encodedOldPassword)
                .one();
        if (user == null) {
            // 3.不一致，报错
            return Result.fail("密码错误或尚未设置密码");
        }
        // 4.密码正确，修改密码
        String encodedNewPassword = PasswordEncoder.encode(newPassword);
        boolean isSuccess = update().setSql("password =" + encodedNewPassword).eq("id", user.getId()).update();
        if (!isSuccess) {
            return Result.fail("服务器故障，修改失败");
        }
        // 登出
        logout(request);
        return Result.ok();
    }

    /**
     * 根据id查询用户信息。
     * @param userId 用户id
     * @return 成功：脱敏的用户信息 / 失败：ok
     */
    @Override
    public Result queryUserById(Long userId) {
        // 查询详情
        User user = getById(userId);
        if (user == null) {
            return Result.ok();
        }
        // 用户信息脱敏
        UserDTO userDTO = BeanUtil.copyProperties(user, UserDTO.class);
        // 返回
        return Result.ok(userDTO);
    }

    /**
     * 发送修改密码的手机验证码
     * 通过阿里云服务实现，并将验证码保存在session中等待比对。
     * @param phone 电话号码
     * @return 成功：ok / 失败：失败原因
     */
    @Override
    public Result sendCodeForChangePassword(String phone) {
        // 校验手机号
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 发送验证码，发送成功则保存到Redis等待校验
        String msg = aliyunSendSmsService.sendCodeToUser(phone, CHANGE_PASSWORD_CODE_KEY);
        log.trace(msg);
        // 返回ok
        return Result.ok();
    }

    /**
     * 通过验证码修改密码。
     * 通过验证后将加盐加密的密码加入数据库。修改成功后登出。
     * @param changePasswordForm 修改密码表单
     * @param request http请求
     * @return 登录成功：ok / 登录失败：失败原因
     */
    @Override
    public Result changePasswordByCode(ChangePasswordFormDTO changePasswordForm, HttpServletRequest request) {
        // 1.校验手机号
        String phone = changePasswordForm.getPhone();
        if (RegexUtils.isPhoneInvalid(phone)) {
            // 如果不符合，返回错误信息
            return Result.fail("手机号格式错误！");
        }
        // 2.校验验证码
        String cacheCode = stringRedisTemplate.opsForValue().get(CHANGE_PASSWORD_CODE_KEY + phone);
        String code = changePasswordForm.getCode();
        if (cacheCode == null || RegexUtils.isCodeInvalid(code) || !cacheCode.equals(code)) {
            // 3.不一致，报错
            return Result.fail("验证码错误");
        }
        // 4.一致，根据手机号查询用户
        User user = query().eq("phone", phone).one();
        // 5.判断用户是否存在
        if (user == null) {
            return Result.fail("用户不存在！");
        }
        // 6.验证通过，修改密码
        String newPassword = changePasswordForm.getNewPassword();
        String encodedNewPassword = PasswordEncoder.encode(newPassword);
        boolean isSuccess = update()
                .setSql("password =" + encodedNewPassword)
                .eq("id", user.getId())
                .update();
        if (!isSuccess) {
            return Result.fail("服务器故障，修改失败");
        }
        // 7.登出
        logout(request);
        return Result.ok();
    }

    /**
     * 登出
     * @param request http请求
     * @return ok
     */
    @Override
    public Result logout(HttpServletRequest request) {
        // 1.获取token
        String token = request.getHeader("authorization");
        // 2.将token从Redis中删除
        String tokenKey = LOGIN_USER_KEY + token;
        Map<Object, Object> map = stringRedisTemplate.opsForHash().entries(tokenKey);
        for (Map.Entry<Object, Object> entry : map.entrySet()) {
            stringRedisTemplate.opsForHash().delete(tokenKey, entry.getKey());
        }
        //返回
        return Result.ok();
    }

    /**
     * 用户签到。
     * 使用Redis的BitMap储存签到信息。
     * @return ok
     */
    @Override
    public Result sign() {
        // 1.获取当前登录用户
        Long userId = UserHolder.getUser().getId();
        // 2.获取日期
        LocalDateTime now = LocalDateTime.now();
        // 3.拼接key
        String keySuffix = now.format(DateTimeFormatter.ofPattern(";yyyyMM"));
        String key = USER_SIGN_KEY + userId + keySuffix;
        // 4.获取今天是本月的第几天
        int dayOfMonth = now.getDayOfMonth();
        // 5.写入Redis SETBIT key offset 1
        stringRedisTemplate.opsForValue().setBit(key, dayOfMonth - 1, true);
        return Result.ok();
    }

    /**
     * 统计用户连续签到天数。
     * 从BitMap中获取信息后统计天数。
     * @return 连续签到天数
     */
    @Override
    public Result signCount() {
        // 1.获取当前登录用户
        Long userId = UserHolder.getUser().getId();
        // 2.获取日期
        LocalDateTime now = LocalDateTime.now();
        // 3.拼接key
        String keySuffix = now.format(DateTimeFormatter.ofPattern(";yyyyMM"));
        String key = USER_SIGN_KEY + userId + keySuffix;
        // 4.获取今天是本月的第几天
        int dayOfMonth = now.getDayOfMonth();
        // 5.获取本月截止今天为止的所有的签到记录，返回的是一个十进制的数字 BITFIELDsign:5:202203 GET u14 0
        List<Long> result = stringRedisTemplate.opsForValue().bitField(key,
                BitFieldSubCommands.create()
                        .get(BitFieldSubCommands.BitFieldType.unsigned(dayOfMonth)).valueAt(0)
        );
        if (result == null || result.isEmpty()) {
            //没有任何签到结果
            return Result.ok(0);
        }
        Long num = result.get(0);
        if (num == null || num == 0) {
            return Result.ok(0);
        }
        // 6.循环遍历
        int count = 0;
        while (true) {
            //6.1.让这个数字与1做与运算，得到数字的最后一个bit位 // 判断这位是否为0
            if ((num & 1) == 0) {
                // 如果为0，说明未签到，结束
                break;
            } else {
                // 如果不为0，说明已签到，计数器+1
                count++;
            }
            // 把数字右移一位，抛弃最后一个bit位，继续下一个bit位
            num >>>= 1;
        }
        return Result.ok(count);
    }

    /**
     * 根据电话号码创建用户。
     * @param phone 电话号码
     * @return user
     */
    private User createUserWithPhone(String phone) {
        // 创建用户
        User user = new User();
        user.setPhone(phone);
        user.setNickName(USER_NICK_NAME_PREFIX + RandomUtil.randomString(10));
        save(user);
        return user;
    }
}
